// Borland C++ Builder
// Copyright (c) 1995, 1999 by Borland International
// All rights reserved

// (DO NOT EDIT: machine generated header) 'IdDsnPropEdBinding.pas' rev: 5.00

#ifndef IdDsnPropEdBindingHPP
#define IdDsnPropEdBindingHPP

#pragma delphiheader begin
#pragma option push -w-
#pragma option push -Vx
#include <Classes.hpp>	// Pascal unit
#include <Graphics.hpp>	// Pascal unit
#include <ActnList.hpp>	// Pascal unit
#include <ExtCtrls.hpp>	// Pascal unit
#include <Buttons.hpp>	// Pascal unit
#include <StdCtrls.hpp>	// Pascal unit
#include <Forms.hpp>	// Pascal unit
#include <Controls.hpp>	// Pascal unit
#include <SysInit.hpp>	// Pascal unit
#include <System.hpp>	// Pascal unit

//-- user supplied -----------------------------------------------------------

namespace Iddsnpropedbinding
{
//-- type declarations -------------------------------------------------------
class DELPHICLASS TIdPropEdBindingEntry;
class PASCALIMPLEMENTATION TIdPropEdBindingEntry : public Forms::TForm 
{
	typedef Forms::TForm inherited;
	
protected:
	Stdctrls::TButton* btnOk;
	Stdctrls::TButton* btnCancel;
	Stdctrls::TLabel* lblBindings;
	Stdctrls::TLabel* lblHostname;
	Stdctrls::TLabel* lblPort;
	Stdctrls::TListBox* lstBindings;
	Stdctrls::TButton* btnAdd;
	Stdctrls::TButton* btnRemove;
	Stdctrls::TComboBox* cmbPort;
	Stdctrls::TComboBox* cmbHostname;
	Actnlist::TActionList* actBndEditor;
	Actnlist::TAction* actAdd;
	Actnlist::TAction* actRemove;
	bool fCreatedStack;
	void __fastcall lstBindingsClick(System::TObject* Sender);
	void __fastcall actAddExecute(System::TObject* Sender);
	void __fastcall actAddUpdate(System::TObject* Sender);
	void __fastcall actRemoveExecute(System::TObject* Sender);
	void __fastcall actRemoveUpdate(System::TObject* Sender);
	void __fastcall cmbPortKeyPress(System::TObject* Sender, char &Key);
	void __fastcall cmbHostnameKeyPress(System::TObject* Sender, char &Key);
	void __fastcall ValidateAddBinding(void);
	void __fastcall SetHostname(const AnsiString Value);
	void __fastcall SetPort(const int Value);
	AnsiString __fastcall PortDescription(const int PortNumber);
	AnsiString __fastcall GetHostname(void);
	int __fastcall GetPort(void);
	void __fastcall SetBinding(const AnsiString Binding);
	AnsiString __fastcall GetBinding(void);
	
public:
	__fastcall virtual TIdPropEdBindingEntry(Classes::TComponent* AOwner);
	__fastcall virtual ~TIdPropEdBindingEntry(void);
	void __fastcall SetList(const AnsiString Arg);
	AnsiString __fastcall GetList(void);
	__property AnsiString Binding = {read=GetBinding, write=SetBinding};
	__property AnsiString Hostname = {read=GetHostname, write=SetHostname};
	__property int Port = {read=GetPort, write=SetPort, nodefault};
public:
	#pragma option push -w-inl
	/* TCustomForm.CreateNew */ inline __fastcall virtual TIdPropEdBindingEntry(Classes::TComponent* AOwner
		, int Dummy) : Forms::TForm(AOwner, Dummy) { }
	#pragma option pop
	
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TIdPropEdBindingEntry(HWND ParentWindow) : Forms::TForm(
		ParentWindow) { }
	#pragma option pop
	
};


//-- var, const, procedure ---------------------------------------------------
extern PACKAGE AnsiString __fastcall MakeBindingStr(AnsiString AIP, unsigned APort);

}	/* namespace Iddsnpropedbinding */
#if !defined(NO_IMPLICIT_NAMESPACE_USE)
using namespace Iddsnpropedbinding;
#endif
#pragma option pop	// -w-
#pragma option pop	// -Vx

#pragma delphiheader end.
//-- end unit ----------------------------------------------------------------
#endif	// IdDsnPropEdBinding
